home *** CD-ROM | disk | FTP | other *** search
/ Loadstar 44 / 044.d81 / desert trader (.txt) < prev    next >
Encoding:
Commodore BASIC  |  1988-01-01  |  22.6 KB  |  748 lines
  1. 1 rem
  2. 2 rem    (c) 1986 by mark martin
  3. 3 rem
  4. 4 rem
  5. 5 if ld%=1 then 7
  6. 6 print"[147]":ld%=1:load"sprite.ml",8,1
  7. 7 poke55,255:poke56,127:clr
  8. 8 poke56576,(peek(56576)and252)or1
  9. 9 poke53272,(peek(53272)and15)or.
  10. 10 poke648,128
  11. 11 print"[147]":gosub 547
  12. 12 dim ht$(7,2)
  13. 13 wf% = 8
  14. 14 wt% = 9
  15. 15 tn$="newtown":tn%=4:p1=80:p2=90:p3=40:p4=84:p5=60:p6=85:p7=50:p8=16
  16. 16 bar$="the liquor palace"
  17. 17 m1$="goruthan":m2$="clornik":m3$="largian":m4$="nervian":m5$="brogian"
  18. 18 m6$="bandit":m7$="cyclopian":m8$="yorchnoid"
  19. 19 s1=30:w1=0:w2=0:cr=250:f1=25:sn%=8:mx%=1
  20. 20 ht$(1,1)="books, weapons   ":ht$(1,2)="liquor, spices"
  21. 21 ht$(2,1)="weapons, crystals":ht$(2,2)="spices, tobacco"
  22. 22 ht$(3,1)="medicine, books  ":ht$(3,2)="rations, liquor"
  23. 23 ht$(4,1)="crystals, rations":ht$(4,2)="tobacco, medicine"
  24. 24 ht$(5,1)="liquor, spices   ":ht$(5,2)="books, weapons"
  25. 25 ht$(6,1)="spices, tobacco  ":ht$(6,2)="weapons, crystals"
  26. 26 ht$(7,1)="tobacco, medicine":ht$(7,2)="crystals, rations"
  27. 27 gosub316:pokevc+21,0
  28. 28 poke53280,2:poke53281,0
  29. 29 print chr$(142) "[147][152]" tab(3)"do you want a printed copy"
  30. 30 print tab(3)"of the game map? (y/n)"
  31. 31 print:print tab(3)"note: your printer must be able"
  32. 32 print tab(9)"to print graphic characters."
  33. 33 gosub 510: if a$="n" then 76: rem skip map hard-copy
  34. 34 print:print tab(3)"do you want hints printed also? (y/n)":gosub510
  35. 35 print:print tab(3)"be sure your printer is ready,"
  36. 36 print tab(3)"and press any key."
  37. 37 getc$: if c$="" then 37
  38. 38 open4,4,0:print#4
  39. 39 print#4,"  ";:for i=1to74: print#4,"[164]";:next i
  40. 40 print#4:print#4:print#4,chr$(15);chr$(14);
  41. 41 print#4,"             the great desert"
  42. 42 print#4,chr$(15):forx=1to5:print#4:nextx
  43. 43 print#4,"                    dustbowl 1":print#4:print#4
  44. 44 print#4,"                   [206][205] [206][205]                                 cyote 2"
  45. 45 print#4,"                 [206][205] [206][205]  [206][205] [206][205][206][205]"
  46. 46 print#4,"                 [206][205][206][205] [206][205]  [206][205]"
  47. 47 print#4,"                 [206][205]  [206][205][206][205] [206][205][206][205] [206][205][206][205]"
  48. 48 print#4,"                  [206][205] [206][205]  [206][205] [206][205][206][205] [206][205]"
  49. 49 print#4,"                [206][205][206][205][206][205]  [206][205] [206][205][206][205] [206][205]"
  50. 50 print#4,"          bizbee  [206][205][206][205] [206][205][206][205]  [206][205]  [206][205] [206][205][206][205]"
  51. 51 print#4,"            3       [206][205][206][205] [206][205]  [206][205][206][205] [206][205] [206][205]"
  52. 52 print#4,"                 [206][205]  [206][205][206][205] [206][205]  [206][205]       newtown"
  53. 53 print#4,"                   [206][205][206][205] [206][205] [206][205][206][205] [206][205]          4";
  54. 54 print#4,chr$(15);chr$(14);"    sand dunes"
  55. 55 print#4,chr$(15);"                 [206][205]  [206][205][206][205] [206][205][206][205] [206][205][206][205]"
  56. 56 print#4,"                  [206][205] [206][205]  [206][205] [206][205][206][205] [206][205]"
  57. 57 print#4,"                [206][205][206][205][206][205]  [206][205] [206][205][206][205] [206][205]"
  58. 58 print#4,"                    [206][205][206][205] [206][205]  [206][205][206][205] [206][205] [206][205]"
  59. 59 print#4,"                 [206][205]  [206][205][206][205] [206][205]  [206][205]        artel"
  60. 60 print#4,"                   [206][205][206][205] [206][205] [206][205][206][205] [206][205]           5"
  61. 61 print#4,"                 [206][205]  [206][205][206][205] [206][205][206][205] [206][205][206][205]"
  62. 62 print#4,"                  [206][205] [206][205]  [206][205] [206][205][206][205] [206][205]"
  63. 63 print#4,"                [206][205][206][205][206][205]  [206][205] [206][205][206][205] [206][205]"
  64. 64 print#4,"                     [206][205][206][205] [206][205][206][205] [206][205]"
  65. 65 print#4,"                         [206][205] [206][205][206][205]"
  66. 66 print#4,"                        [206][205] [206][205]"
  67. 67 print#4,"                   [206][205] [206][205]                              rocktowne 7"
  68. 68 print#4,"          desertvil 6"
  69. 69 if a$="n"then75
  70. 70 forx=1to3:print#4,"":nextx:print#4,"  ";:for i=1to74:print#4,"[164]";:next i
  71. 71 print#4,"":print#4,"":print#4,chr$(15);
  72. 72 print#4,chr$(14);"             items for trade:":print#4,chr$(15),""
  73. 73 print#4,spc(10)"cheap                                   expensive":print#4
  74. 74 forx=1to7:print#4,spc(6)str$(x)") "ht$(x,1)spc(23)ht$(x,2):next x
  75. 75 print#4,chr$(12):close4
  76. 76 p1$="crystal":p2$="weapons":p3$="books":p4$="medicine":p5$="tobacco"
  77. 77 p6$="spices":p7$="liquor":p8$="rations"
  78. 78 print"[147]do you want instructions (y/n)":gosub 510
  79. 79 if a$="n" then 92
  80. 80 rem print instructions----------
  81. 81 open 1,8,15:open 5,8,5,"0:instructions,s,r":gosub 528
  82. 82 if e% > 19 then 81
  83. 83 print chr$(14);:z$=chr$(.)
  84. 84 for x = 1 to 3
  85. 85 for y = 1 to 24
  86. 86 input#5, ln$: if asc(left$(ln$,1)+z$)<>151 then 88
  87. 87 a=len(ln$)-1:print "[155]" right$(ln$,a) :goto89
  88. 88 println$
  89. 89 nexty:poke198,.:wait198,1:next x: close 5: close 1
  90. 90 :
  91. 91 rem town menu------------------------
  92. 92 poke53280,2:printchr$(142)
  93. 93 print"[147][167][214][214][214][214][129][214][214][214][214][214][158][214][214][214][165]t[153]own  squar[154]e[167][214][214][214][214][214][214][214][214][156][214][214][214][214][165][152]"
  94. 94 sc% = 1: if nu=0 and cr=0 then 467
  95. 95 gosub455
  96. 96 print tab(wt%)"you're in ";tn$;"."
  97. 97 print tab(wt%)"where will you go?"
  98. 98 print tab(wt%)"(1) the bar"
  99. 99 print tab(wt%)"(2)[160]the weapon shoppe"
  100. 100 print tab(wt%)"(3) the merchant"
  101. 101 print tab(wt%)"(4) the doctor"
  102. 102 print tab(wt%)"(5) the map"
  103. 103 print tab(wt%)"(6) another town"
  104. 104 print tab(wt%)"(7) back to loadstar[145]"
  105. 105 max$="7": gosub 523
  106. 106 on a goto 107,157,233,427,611,321,9000
  107. 107 rem bar-----------------------------
  108. 108 print"[147][167][214][214][214][214][129][214][214][214][214][214][158][214][214][214][214][214][153][214][214][165]b a r[167][214][154][214][214][214][214][214][214][214][214][214][214][156][214][214][214][214][165][152]"
  109. 109 if spr%=1 then 111
  110. 110 sys 828,40960,"bar":spr%=1
  111. 111 gosub 589
  112. 112 gosub455:print tab(wt%)"welcome to":print tab(wt%)bar$
  113. 113 sd%=1:gosub536:sd%=0:gosub455
  114. 114 x=int(12*rnd(1))+1
  115. 115 on x goto 118, 122, 126, 130, 135, 138, 143, 147
  116. 116 goto 152
  117. 117 :
  118. 118 print tab(wt%)"a stranger picks":print tab(wt%)"a fight with you."
  119. 119 print tab(wt%)"he beats you up and":print tab(wt%)"tosses you in the"
  120. 120 print tab(wt%)"street.":goto156
  121. 121 :
  122. 122 print tab(wt%)"a stranger picks":print tab(wt%)"a fight with you."
  123. 123 print tab(wt%)"you beat him up and"
  124. 124 print tab(wt%)"throw him out of the":print tab(wt%)"bar.":goto156
  125. 125 :
  126. 126 print tab(wt%)"after a drink or":print tab(wt%)"two, a brawl starts"
  127. 127 print tab(wt%)"and you get beat up.":print tab(wt%)"you are tossed into"
  128. 128 print tab(wt%)"the street.":goto156
  129. 129 :
  130. 130 print tab(wt%)"after a drink or":print tab(wt%)"two, you gamble for"
  131. 131 print tab(wt%)"a while and loose 25"
  132. 132 print tab(wt%)"credits":cr=cr-25:ifcr<0thencr=0
  133. 133 goto156
  134. 134 :
  135. 135 print tab(wt%)"you feel lucky and":print tab(wt%)"decide to gamble."
  136. 136 print tab(wt%)"you win 25 credits!":cr=cr+25:goto156
  137. 137 :
  138. 138 print tab(wt%)"you try to pay for":print tab(wt%)"your drink an find"
  139. 139 print tab(wt%)"that your wallet is":print tab(wt%)"gone. a thief!"
  140. 140 cr=cr-50:ifcr<0thencr=0
  141. 141 goto 156
  142. 142 :
  143. 143 print tab(wt%)"you catch a thief":print tab(wt%)"trying to steal your"
  144. 144 printtab(wt%)"wallet. you get a":print tab(wt%)"50 credit reward!":cr=cr+50
  145. 145 goto 156
  146. 146 :
  147. 147 print tab(wt%)"you get stone blind":print tab(wt%)"drunk, and the law"
  148. 148 print tab(wt%)"fines you 10":print tab(wt%)"credits."
  149. 149 cr=cr-10: if cr<0 then cr=0
  150. 150 goto 156
  151. 151 :
  152. 152 print tab(wt%)"you relax and have a":print tab(wt%)"few drinks. nothing"
  153. 153 print tab(wt%)"interesting happens;":print tab(wt%)"so you leave."
  154. 154 cr=cr-2:ifcr<0thencr=0
  155. 155 :
  156. 156 gosub 536:goto 315
  157. 157 rem store---------------------------
  158. 158 if spr%=2 then 160
  159. 159 sys828,40960,"store":spr%=2
  160. 160 gosub 589
  161. 161 print"[147][167][214][214][214][214][129][214][214][214][214][214][158][214][214][214][214][214][153][165]weapons[167][214][154][214][214][214][214][214][214][214][214][214][214][156][214][214][214][214][165][152]"
  162. 162 print"";:printtab(1);"knife";tab(33);"club"
  163. 163 printtab(2);" 25  ";tab(32);" 200 "
  164. 164 print"";:printtab(1);"staff";tab(33);"sword"
  165. 165 printtab(2);"100 ";tab(32);" 400 "
  166. 166 print"";:printtab(14);"laser"
  167. 167 printtab(14);" 650 "
  168. 168 gosub455:print tab(wt%)"welcome to the shop."
  169. 169 sd%=1:gosub620:sd%=0
  170. 170 gosub455:print tab(wt%)"what's your pleasure?"
  171. 171 print tab(wt%)"(1) buy"
  172. 172 print tab(wt%)"(2) sell"
  173. 173 print tab(wt%)"(3) leave"
  174. 174 max$="3": gosub523
  175. 175 on (a-1) goto 213, 315
  176. 176 if w1 > 0 then 209
  177. 177 if cr>=25 then 180
  178. 178 gosub 455: print tab(wt%)"you can't afford"
  179. 179 print tab(wt%)"any weapons":ln%=2: gosub 536:goto315
  180. 180 on a  goto 183,213,315
  181. 181 :
  182. 182 rem buy-----------------------------
  183. 183 gosub 455: print tab(wt%)"what would you like?"
  184. 184 print tab(wt%)"(1) knife"
  185. 185 print tab(wt%)"(2) staff"
  186. 186 print tab(wt%)"(3) club"
  187. 187 print tab(wt%)"(4) sword"
  188. 188 print tab(wt%)"(5) laser"
  189. 189 print tab(wt%)"(6)[160]nothing"
  190. 190 max$="6": gosub 523: w1=1
  191. 191 on a goto 192, 193, 194, 195, 196, 170
  192. 192 wbuy$="knife": wprice=25: goto197
  193. 193 wbuy$="staff": wprice=100: goto197
  194. 194 wbuy$="club": wprice=200: goto197
  195. 195 wbuy$="sword": wprice=400: goto197
  196. 196 wbuy$="laser": wprice=650
  197. 197 if wprice <= cr then 199
  198. 198 gosub 455:print tab(wt%)"you can't afford it.":gosub 536:goto183
  199. 199 on a goto 200, 201, 202, 203, 204
  200. 200 w2=1: goto 205
  201. 201 w2=2: goto 205
  202. 202 w2=3: goto 205
  203. 203 w2=6: goto 205
  204. 204 w2=10
  205. 205 cr=cr-wprice
  206. 206 gosub 455: print tab(wt%)"that's";wprice;"credits":ln%=1:gosub 542
  207. 207 print tab(wt%)"thanks.":print tab(wt%)"come back soon!"
  208. 208 gosub 536: goto 315
  209. 209 rem has weapon----------------------
  210. 210 gosub455
  211. 211 print tab(wt%)"the law forbids":print tab(wt%)"the ownership of"
  212. 212 print tab(wt%)"more than 1 weapon.":ln%=3: gosub 536
  213. 213 rem sell----------------------------
  214. 214 if w1 > 0 then 218
  215. 215 gosub 455
  216. 216 print tab(wt%)"you have nothing"
  217. 217 print tab(wt%)"to sell.":ln%=1:gosub 536:goto170
  218. 218 gosub 455: print tab(wt%)"i see you have a":print tab(wt%) wbuy$;"."
  219. 219 print tab(wt%)"will you take";wprice: print tab(wt%)"credits for it?"
  220. 220 print tab(wt%)"(1) yes"
  221. 221 print tab(wt%)"(2) no"
  222. 222 max$ = "2": gosub 523
  223. 223 if a=2 thengosub455:print tab(wt%)"ok. forget it.":gosub 536:goto315
  224. 224 cr=cr+wprice:w1=0:wbuy$="":w2=0:gosub 455
  225. 225 print tab(wt%)"good deal!":gosub 536
  226. 226 gosub455
  227. 227 print tab(wt%)"can i interest you":print tab(wt%)"in anything else?"
  228. 228 print tab(wt%)"(1) yes"
  229. 229 print tab(wt%)"(2) no
  230. 230 max$ [178] "2": [141] 523
  231. 231 [139] a[178]1 [167] [137] 183
  232. 232 [141] 455: [153] [163]wt%)"ok. goodbye!":[141] 536:[137]315
  233. 233 [143] general merchandise-------------
  234. 234 [139] cr[177][178]1000 [167] [137] 477
  235. 235 [139] spr%[178]3 [167] 237
  236. 236 [158] 828,40960,"sp1":spr%[178]3
  237. 237 [141] 589
  238. 238 [153]"loadthen(NULL)(NULL)(NULL)(NULL)for(NULL)(NULL)(NULL)(NULL)fnsysgenerprintal  merchacontndisethen(NULL)(NULL)(NULL)(NULL)clr(NULL)(NULL)(NULL)(NULL)fnprint#"
  239. 239 [153]"";:[153][163]1);p1$;[163]32);p5$
  240. 240 [153]"";:[153][163]1);p2$;[163]32);p6$
  241. 241 [153]"";:[153][163]2);p3$;[163]32);p7$
  242. 242 [153]"";:[153][163]2);p4$;[163]32);p8$
  243. 243 [141]455:[153] [163]wt%)"welcome to the store"
  244. 244 sd%[178]1:[141]536:sd%[178]0
  245. 245 [141]455:[153] [163]wt%)"what's your pleasure?"
  246. 246 [153] [163]wt%)"(1) buy"
  247. 247 [153] [163]wt%)"(2) sell"
  248. 248 [153] [163]wt%)"(3) leave"
  249. 249 [153] [163]wt%)"(4) take a hint"
  250. 250 max$ [178] "4": [141] 523
  251. 251 [145] a  [137] 255,297,315
  252. 252 [141]455:[153] [163]wt%)"cheap":[153][163]wt%)" "ht$(tn%,1):[153]
  253. 253 [153] [163]wt%)"expensive":[153][163]wt%)" "ht$(tn%,2):[141]536:[137]245
  254. 254 [143] buy-----------------------------
  255. 255 [141] 455
  256. 256 [139] nu [179][178] 0 [167] 259
  257. 257 [153] [163]wt%)"you already have":[153][163]wt%)"something."
  258. 258 [141] 536: [137] 297
  259. 259 [139] cr [177][178] p8 [167] 262
  260. 260 [153] [163]wt%)"you don't have":[153] [163]wt%)"enough money to"
  261. 261 [153] [163]wt%)"buy anything!":[141] 536:[137] 466
  262. 262 [141] 455: [153] [163]wt%)"what would you like?"
  263. 263 [153] [163]wt%)"(1) "p1$
  264. 264 [153] [163]wt%)"(2) "p2$
  265. 265 [153] [163]wt%)"(3) "p3$
  266. 266 [153] [163]wt%)"(4) "p4$
  267. 267 [153] [163]wt%)"(5) "p5$
  268. 268 [153] [163]wt%)"(6) "p6$
  269. 269 [153] [163]wt%)"(7) "p7$
  270. 270 [153] [163]wt%)"(8) "p8$: [153] [163]wt%)"(9) nothingon"
  271. 271 max$ [178] "9": [141] 523
  272. 272 [139] a[178]9 [167]245
  273. 280 pr%[178]a:[141]800
  274. 281 [141] 455
  275. 282 [153] [163]wt%)"that'll be";price:[153] [163]wt%)"credits per unit"
  276. 283 [153] [163]wt%)"how many units"
  277. 284 [153] [163]wt%)"do you want?": [153] [163]wt%)"enter the number you"
  278. 285 [153] [163]wt%)"want (2 digit limit)": [153] [163]wt%)"and press <return>:";
  279. 286 mnd%[178]2: [141] 512: nu[178]iv%
  280. 287 [139] (nu[172]price) [179][178] cr[167] 290
  281. 288 [141] 455: [153] [163]wt%)"you don't have"
  282. 289 [153] [163]wt%)"enough money!":[141] 536:[137]262
  283. 290 [139]nu[178]0[167]262
  284. 291 cr[178]cr[171](nu[172]price):[141]455:[153] [163]wt%)"that's";(nu[172]price);"credits."
  285. 293 sell$[178]buy$:nb[178]nu
  286. 294 [153][163]wt%)"thanks a lot."
  287. 295 [153][163]wt%)"come  back soon!":[141] 536
  288. 296 [151]vc[170]21,0:[137] 92
  289. 297 [143] sell----------------------------
  290. 298 [141] 455
  291. 299 [139] nu [177] 0 [167] 302
  292. 300 [153] [163]wt%)"you have nothing"
  293. 301 [153] [163]wt%)"to sell.":ln%[178]2:[141] 536:[137]245
  294. 302 [153] [163]wt%)"i'll buy all of your "
  295. 303 [153] [163]wt%)sell$" for";(nb[172]price):ln%[178]1: [141] 542
  296. 304 [153] [163]wt%)"now that's a fair": [153] [163]wt%)"price...";
  297. 305 ln%[178]1: [141] 542
  298. 306 [153] [163]wt%)"isn't it?"
  299. 307 [153] [163]wt%)"(1) yes":[153] [163]wt%)"(2) no"
  300. 308 max$ [178] "2": [141] 523
  301. 310 [139] a [178] 2 [167] 313
  302. 311 cr[178]cr[170](nu[172]price):[141]455:[153][163]wt%)"good deal!":sell$[178]"":nu[178]0
  303. 312 [153] [163]wt%)"come back soon!": [141] 536: [137] 314
  304. 313 [141]455:[153] [163]wt%)"ok. forget it.":[141] 536
  305. 314 [143] forx=1to8:spritex,0:nextx:goto640
  306. 315 [151] vc[170]21,0: [137] 92
  307. 316 [141] 499:[141]455
  308. 317 [153][163]wt%)"desert  trader"
  309. 318 [153][163]wt%)"by mark martin":ir%[178]1:sd%[178]1:[141] 536:sd%[178]0
  310. 319 ir%[178]0:[158]1088
  311. 320 [142]
  312. 321 [143] leave town----------------------
  313. 322 [141] 499
  314. 323 [141]455: [153] [163]wt%)"beware! the desert"
  315. 324 [153] [163]wt%)"is a dangerous place":[153] [163]wt%)"to travel!"
  316. 325 sd%[178]1:[141] 536:sd%[178]0
  317. 326 [139]tn$[178]"dustbowl"[167]t1$[178]"bizbee":t2$[178]"newtown":t3$[178]"cyote"
  318. 327 [139]tn$[178]"cyote"[167]t1$[178]"dustbowl":t2$[178]"newtown":t3$[178]"no third choice"
  319. 328 [139]tn$[178]"bizbee"[167]t1$[178]"dustbowl":t2$[178]"desertvil":t3$[178]"no third choice"
  320. 329 [139]tn$[178]"newtown"[167]t1$[178]"dustbowl":t2$[178]"artel":t3$[178]"cyote"
  321. 330 [139]tn$[178]"desertvil"[167]t1$[178]"bizbee":t2$[178]"artel":t3$[178]"rocktowne"
  322. 331 [139]tn$[178]"artel"[167]t1$[178]"desertvil":t2$[178]"newtown":t3$[178]"rocktowne"
  323. 332 [139]tn$[178]"rocktowne"[167]t1$[178]"desertvil":t2$[178]"artel":t3$[178]"no third choice"
  324. 333 [141] 455: [153] [163]wt%)"where are ya' headed?"
  325. 334 [153] [163]wt%)"(1) ";t1$:[153] [163]wt%)"(2) ";t2$:[153] [163]wt%)"(3) ";t3$
  326. 335 [153] [163]wt%)"(4) the map"
  327. 336 max$ [178] "4": [141] 523
  328. 337 [139] a[178]4 [167] [151]vc[170]21,0:[158]1088:[141]611:[141]499:[137]333
  329. 338 [139]a[178]1[167]tn$[178]t1$:[137] 342
  330. 339 [139]a[178]2[167]tn$[178]t2$: [137] 342
  331. 340 [139]a[178]3[175]t3$[179][177]"no third choice"[167]tn$[178]t3$: [137] 342
  332. 341 [153] [163]wt%)"that's not a choice!":ln%[178]2:[141] 542:[137]333
  333. 342 [143] town prices---------------------
  334. 343 z1[178][181](6[172][187](1)):z2[178][181](11[172][187](1)):z3[178][181](8[172][187](1))
  335. 344 [139] tn$ [178] "cyote" [167] 352
  336. 345 [139] tn$ [178] "dustbowl" [167] 354
  337. 346 [139] tn$ [178] "bizbee" [167] 356
  338. 347 [139] tn$ [178] "desertvil" [167] 358
  339. 348 [139] tn$ [178] "rocktowne" [167] 360
  340. 349 [139] tn$ [178] "artel" [167] 362
  341. 350 p1[178](80[170]z2):p2[178](90[170]z2):p3[178](40[170]z1):p4[178](84[170]z3):p5[178](60[170]z3):tn%[178]4
  342. 351 p6[178](85[170]z3):p7[178](50[170]z1):p8[178](16[170]z1):bar$[178]"the liquor palace": [137] 364
  343. 352 p1[178](80[170]z2):p2[178](72[170]z2):p3[178](40[170]z1):p4[178](70[170]z3):p5[178](60[170]z3):tn%[178]2
  344. 353 p6[178](102[170]z3):p7[178](50[170]z1):p8[178](20[170]z1):bar$[178]"cyote bar & grill": [137] 364
  345. 354 p1[178](100[170]z2):p2[178](72[170]z2):p3[178](32[170]z1):p4[178](70[170]z3):p5[178](50[170]z3):tn%[178]1
  346. 355 p6[178](102[170]z3):p7[178](60[170]z1):p8[178](20[170]z1):bar$[178]"hank's bar": [137] 364
  347. 356 p1[178](100[170]z2):p2[178](90[170]z2):p3[178](32[170]z1):p4[178](56[170]z3):p5[178](50[170]z3):tn%[178]3
  348. 357 p6[178](85[170]z3):p7[178](60[170]z1):p8[178](24[170]z1):bar$[178]"buford's": [137] 364
  349. 358 p1[178](120[170]z2):p2[178](90[170]z2):p3[178](40[170]z1):p4[178](56[170]z3):p5[178](40[170]z3):tn%[178]6
  350. 359 p6[178](85[170]z3):p7[178](50[170]z1):p8[178](24[170]z1):bar$[178]"madam's place": [137] 364
  351. 360 p1[178](120[170]z2):p2[178](108[170]z2):p3[178](40[170]z1):p4[178](70[170]z3):p5[178](40[170]z3):tn%[178]7
  352. 361 p6[178](68[170]z3):p7[178](50[170]z1):p8[178](20[170]z1):bar$[178]"eats": [137] 364
  353. 362 p1[178](100[170]z2):p2[178](108[170]z2):p3[178](48[170]z1):p4[178](70[170]z3):p5[178](50[170]z3):tn%[178]5
  354. 363 p6[178](68[170]z3):p7[178](40[170]z1):p8[178](20[170]z1):bar$[178]"joe's bar"
  355. 364 [139]nu[177]0[167] [141]800
  356. 365 [143] begin desert journey------------
  357. 366 cd% [178] 0: [143] bounty credit due
  358. 367 [129] o[178]1[164]3
  359. 368 [141] 455
  360. 369 [153] [163]wt%)"during your":[153] [163]wt%)"journey...":ln%[178]1:[141] 542
  361. 370 y[178][181](3[172][187](1))[170]1
  362. 371 [139]y[178]3[167] [153]"load":[141] 381:[153]"load":[141] 499
  363. 372 [139] o[179]3 [167] 376
  364. 373 [141] 455:[153] [163]wt%)"nothing else": [153] [163]wt%)"happens."
  365. 374 [153] [163]wt%)"you arive at":[153] [163]wt%)tn$
  366. 375 [141] 536: cr [178] cr [170] cd%:ir%[178]0:[151]vc[170]21,0:[158]1088:[137]91
  367. 376 [141] 455
  368. 377 [153] [163]wt%)"nothing interesting":[153] [163]wt%)"happens"
  369. 378 ln%[178]2: [141] 542
  370. 379 [153] [163]wt%)"you are ";o;"/ 3 of":[153] [163]wt%)"the way to ";tn$
  371. 380 [141] 536:[130] o
  372. 381 [143] encounter-----------------------
  373. 382 [151] vc[170]21,0:ir%[178]0:[158]1088
  374. 383 [158] 828,40960,"enc"
  375. 384 spr%[178]5: [141] 589
  376. 385 sc% [178] 1
  377. 386 [151]53280,2:[151]53281,0:[153]"loadprint#";:[153][163]0);m1$;[163]32);m5$
  378. 387 [153]"";:[153][163]0);m2$;[163]32);m6$
  379. 388 [153]"";:[153][163]1);m3$;[163]30);m7$
  380. 389 [153]"";:[153][163]1);m4$;[163]30);m8$
  381. 390 c[178][181](8[172][187](1))[170]1
  382. 391 [145] (c[171]1) [137] 393, 394, 395, 396, 397, 398, 399
  383. 392 c$[178]m1$:s2[178]20:d2[178]5:f2[178]18: [137] 400
  384. 393 c$[178]m2$:s2[178]25:d2[178]4:f2[178]19: [137] 400
  385. 394 c$[178]m3$:s2[178]15:d2[178]7:f2[178]16: [137] 400
  386. 395 c$[178]m4$:s2[178]20:d2[178]4:f2[178]14: [137] 400
  387. 396 c$[178]m5$:s2[178]30:d2[178]8:f2[178]17: [137] 400
  388. 397 c$[178]m6$:s2[178]17:d2[178]4:f2[178]20: [137] 400
  389. 398 c$[178]m7$:s2[178]14:d2[178]6:f2[178]15: [137] 400
  390. 399 c$[178]m8$:s2[178]22:d2[178]5:f2[178]13
  391. 400 [143] creature------------------------
  392. 401 [141]455:[153] [163]wt%)"you are attacked by":[153] [163]wt%)"a ";c$;"!"
  393. 402 bt[178]((s2[170]d2[170]f2)[172]2)
  394. 403 sd%[178]1:[141] 536:sd%[178]0
  395. 404 [143] player attack-------------------
  396. 405 [141] 455
  397. 406 [139] s1 [179][178] 0[167] 466
  398. 408 ht[178]([181](45[172][187](1))[170]1):kl[178]w2[170]4
  399. 409 [139] ht [177] f1 [167] 411
  400. 410 [153] [163]wt%)"you hit it!":s2[178]s2[171]kl:ln%[178]1:[141] 542:[137]413
  401. 411 [153] [163]wt%)"you missed...":ln%[178]1: [141] 542
  402. 412 [143] enemy attack--------------------
  403. 413 [139] s2[177]0 [167] 417
  404. 414 [141] 455: [153] [163]wt%)"you killed it!"
  405. 415 [141]490: [153] [163]wt%)"standard bounty for": [153] [163]wt%) c$;" is";bt
  406. 416 [153] [163]wt%)"credits.":cd%[178]cd%[170]bt:[141] 536:[142]
  407. 417 ht[178]([181](45[172][187](1))[170]1):kl[178]d2
  408. 418 [139]ht[179][178]f2 [167] [153][163]wt%)"it hit you!":ln%[178]1:[141]542:s1[178]s1[171]kl:[137]420
  409. 419 [153] [163]wt%)"it missed...":ln%[178]1: [141] 542
  410. 420 [139]s1[179][178]0[167] s1[178]0:[137]466
  411. 421 [141] 455: [153] [163]wt%)"what will you do?"
  412. 422 [153] [163]wt%)"(1) stay and fight"
  413. 423 [153] [163]wt%)"(2) run like a coward"
  414. 424 max$ [178] "2": [141] 523
  415. 425 [139] a[178]1 [167] [137] 404
  416. 426 [142]
  417. 427 [143] the doctor----------------------
  418. 428 [153]"loadthen(NULL)(NULL)(NULL)(NULL)for(NULL)(NULL)(NULL)(NULL)(NULL)sys(NULL)(NULL)(NULL)(NULL)(NULL)print(NULL)fndoctorthen(NULL)cont(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)(NULL)clr(NULL)(NULL)(NULL)(NULL)fnprint#"
  419. 429 [139] spr%[178]6 [167] 431
  420. 430 [158] 828,40960,"doc":spr%[178]6
  421. 431 [141] 589
  422. 432 [141]455
  423. 433 [139] s1 [179] 30 [167] 435
  424. 434 [153][163]wt%)"you don't need":[153][163]wt%)"a doctor!":[141]536:[137]315
  425. 435 hl[178](30[171]s1):hp[178][181](2.5[172]hl)
  426. 436 [139]cr[179]hp[167][137]450
  427. 437 [141] 455
  428. 438 [153] [163]wt%)"welcome to the":[153] [163]wt%)"doctor's office."
  429. 439 sd%[178]1:[141]536:sd%[178]0:[141]455
  430. 440 [153] [163]wt%)"would you like to"
  431. 441 [153] [163]wt%)"be healed for";hp: [153] [163]wt%)"credits?"
  432. 442 [153] [163]wt%)"(1) yes":[153] [163]wt%)"(2) no"
  433. 443 max$ [178] "2": [141] 523
  434. 444 [141] 455
  435. 445 [139] a[178]2 [167] 448
  436. 446 cr[178]cr[171]hp:s1[178]30:[141] 455:[153] [163]wt%)"thank you!"
  437. 447 [141] 536: [137] 315
  438. 448 [153] [163]wt%)"ok...forget it!":[141] 536:[137]315
  439. 449 :
  440. 450 [143] can't afford doctor-------------
  441. 451 [153] [163]wt%)"you can't afford":[153] [163]wt%)"my services."
  442. 452 ln%[178]2:[141] 542
  443. 453 [153] [163]wt%)"come back when you":[153] [163]wt%)"can..."
  444. 454 [141] 536: [137]315
  445. 455 [143] window------------------------
  446. 456 [153]"print#" [163]wf%)"orlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlen^"
  447. 457 [129]x[178]1[164]11:[153][163]wf%)"peek                      peek"
  448. 458 [130] x
  449. 459 [153] [163]wf%)"/lenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenlenexpcont"
  450. 460 [139] sc% [178] 0 [167] [153] "verify";
  451. 461 [153] [163]13)"credits:"cr"cmd   "
  452. 462 [139] sc% [178] 0 [167] [153] "verify";
  453. 463 [153] [163]13)"life   :";s1;"cmd   "
  454. 464 [153]""
  455. 465 [142]
  456. 466 [143] player lost--------------------
  457. 467 [141]455:[153] [163]wt%)"the game is over."
  458. 468 [139] nu[177]0 [176] cr[177]0 [167] 472
  459. 469 [153] [163]wt%)"you lost because":[153] [163]wt%)"you have nothing"
  460. 470 [153] [163]wt%)"to sell and no":[153] [163]wt%)"money!"
  461. 471 lost%[178]1:sd%[178]1:[141] 536:sd%[178]0:lost%[178]0:[137] 484
  462. 472 [139] s1[177]0 [167] 477
  463. 473 [153] [163]wt%)"the ";c$:[153] [163]wt%)"killed you!"
  464. 476 lost%[178]1:sd%[178]1:[141] 536:sd%[178]0:lost%[178]0:[137] 484
  465. 477 [143] player won---------------------
  466. 478 [141] 491:[141]455
  467. 479 [153] [163]wt%)"you have enough":[153] [163]wt%)"money to buy a"
  468. 480 [153] [163]wt%)"ticket on the next":[153] [163]wt%)"shuttle!"
  469. 481 [153] [163]wt%)"you won the game":[153] [163]wt%)"with a score of"
  470. 482 [153] [163]wt%)"   ";cr
  471. 483 win%[178]1:sd%[178]1:[141]536
  472. 484 [141] 455: [153] [163]wt%)"do you want to":[153] [163]wt%)"play again?"
  473. 485 [153][163]wt%)"(1) yes":[153][163]wt%)"(2) no"
  474. 486 max$ [178] "2": [141] 523
  475. 487 [151]vc[170]21,0:[153]"load"
  476. 488 [139] a [178] 1 [167] 7
  477. 489 [137]60000
  478. 490 [142]
  479. 491 [143] shuttle launch-----------------
  480. 492 sc%[178]0
  481. 493 [151]53280,0:[151]53281,0:[153]"load"
  482. 494 [153]"print#newposandandandnewposnewnewnewposandandtototoandandposnewandtotototoandposnewnewposnewnewposandandtotoposnew"
  483. 495 [129]x[178]1[164]10:[153]"verify                                       ":[130]
  484. 496 [158]828,40960,"shuttle":spr%[178]7
  485. 497 [141]589:[141] 721
  486. 498 [142]
  487. 499 [143] desert screen----------------
  488. 500 [139] spr%[178]4 [167] 503
  489. 501 [151] vc[170]21,0
  490. 502 [158] 828,40960,"desert"
  491. 503 [151]53280,0:[151]53281,0:[153]"load"
  492. 504 [129]x[178]1[164]12:[153]"cont                                       ":[130]x
  493. 505 [153]"newposandandandnewposnewnewnewposandandtototoandandposnewandtotototoandposnewnewposnewnewposandandtotoposnew"
  494. 506 sc% [178] 0: [143] char color is brown
  495. 507 [129]x[178]1[164]10:[153]"verify                                       ":[130]
  496. 508 spr%[178]4:[141]589:ir%[178]1:[158]919
  497. 509 [142]
  498. 510 [161]a$:[139] a$[179][177]"y" [175] a$[179][177]"n" [167] 510
  499. 511 [142]
  500. 512 [143] get integer--------------------
  501. 513 iv$ [178] "": lv% [178] 1
  502. 514 [161] i$(lv%): [139] i$(lv%) [178] "" [167] 514
  503. 515 [139] [198](i$(lv%)) [178] 13 [167] 520
  504. 516 [139] [198](i$(lv%)) [178] 20 [175] lv% [177] 1 [167]  [153]"cmd cmd";: lv% [178] lv% [171] 1:[137] 514
  505. 517 [139] [198](i$(lv%)) [179] 48 [176] [198](i$(lv%)) [177] 57 [176] lv% [177] mnd% [167] 514
  506. 518 [153] i$(lv%);: lv% [178] lv% [170] 1
  507. 519 [137] 514
  508. 520 [129] x [178] 1 [164] (lv%[171]1): iv$ [178] iv$ [170] i$(x): [130] x
  509. 521 iv% [178] [197]( iv$ ):[153]
  510. 522 [142]
  511. 523 [143] get menu choice----------------
  512. 524 [153] [163]wt%)"enter a number:"
  513. 525 [161] a$:[139]a$[178]"input"[167][141]9000
  514. 526 [139]a$[179]"1"[176]a$[177]max$[167]525
  515. 527 a [178] [197](a$): [142]
  516. 528 [143] trap disk errors----
  517. 529 [132]1, e%, em$: [139] e% [179] 20 [167] 535
  518. 530 [160] 5: [160] 1: [153] "load"em$
  519. 531 [139] e% [178] 62 [167] [153]"insert data disk.": [137] 533
  520. 532 [153] "correct problem if possible."
  521. 533 [153] "press any key when ready."
  522. 534 [161] c$: [139] c$ [178] "" [167] 534
  523. 535 [142]
  524. 536 [143] get a key to continue---------
  525. 537 [139] sd%[178]1 [167] 620
  526. 538 [153] ""[163]9)"print#    press any key     "
  527. 539 [161]cn$
  528. 540 [139]cn$[178]""[167]539
  529. 541 [142]
  530. 542 [143] delay-------------------------
  531. 543 tm[178]ti
  532. 544 ln%[178]ln%[172]60
  533. 545 [139]ti[171]tm[179]ln%[167]545
  534. 546 [142]
  535. 547 [143] sprite usage data-------
  536. 548 sets% [178] 7
  537. 549 sd%[178]128
  538. 550 vc[178]53248
  539. 551 [134] ns%(sets%)
  540. 552 :
  541. 553 [129] x [178] 1 [164] sets%
  542. 554 [135] ns%(x)
  543. 555 [130] x
  544. 556 :
  545. 557 [134] col%(sets%,8), x%(sets%,8), y%(sets%,8)
  546. 558 [134] mult%(sets%,8)
  547. 559 :
  548. 560 [129] x [178] 1 [164] sets%
  549. 561 [129] y [178] 1 [164] ns%(x)
  550. 562 [135] col%(x,y)
  551. 563 [135] x%(x,y)
  552. 564 [135] y%(x,y)
  553. 565 [135] mult%(x,y)
  554. 566 [130] y:[130] x
  555. 567 [129] x [178] 1 [164] 8: [151] 33783[170]x,sd%[170](x[171]1): [130] x
  556. 568 [142]
  557. 569 [131] 5,5,8,8,8,8,8
  558. 570 :
  559. 571 [131] 5,45,100,0,9,45,140,0,2,290,100,0,8,290,140,0,6,165,190,1
  560. 572 :
  561. 573 [131] 5,45,80,0,7,45,132,0,10,290,80,0,13,290,131,1,16,180,183,0
  562. 574 :
  563. 575 [131] 5,48,80,0,9,48,120,1,2,48,160,0,3,48,200,1
  564. 576 [131] 6,290,80,0,15,290,120,1,7,290,160,1,5,290,200,0
  565. 577 :
  566. 578 [131] 6,50,160,0,14,310,150,0,12,150,190,0,13,60,180,0
  567. 579 [131] 15,270,189,0,8,290,55,0,11,248,200,0,2,210,70,0
  568. 580 :
  569. 581 [131] 8,48,80,0,9,48,120,0,2,48,160,0,3,48,200,0
  570. 582 [131] 6,290,80,0,11,290,120,0,7,290,160,0,5,290,200,0
  571. 583 :
  572. 584 [131] 15,60,80,0,9,60,120,0,8,60,160,0,7,60,200,0
  573. 585 [131] 6,290,80,0,5,290,120,0,3,290,160,0,13,290,200,0
  574. 586 :
  575. 587 [131] 2,50,160,0,14,310,185,0,11,150,200,0,15,60,180,0
  576. 588 [131] 15,80,189,0,2,290,165,0,2,310,155,0,8,310,60,0
  577. 589 [143] turn on and position sprites
  578. 590 [151] vc[170]16,0
  579. 591 [151] vc[170]28,0
  580. 592 mm%[178]0
  581. 593 [129] x [178] 1 [164] ns%(spr%):mm%[178]mm%[170]2[174](x[171]1):[130] x
  582. 594 [129] x [178] 1 [164] ns%(spr%)
  583. 595 [151] (vc[170]38[170]x),col%(spr%,x)[171]1
  584. 596 [139] x%(spr%,x) [179] 256 [167] x%[178]x%(spr%,x): [137] 598
  585. 597 [151] vc[170]16,[194](vc[170]16) [176] 2[174](x[171]1): x%[178]x%(spr%,x)[171]255
  586. 598 [151] (vc[171]2)[170](x[172]2),x%
  587. 599 [151] (vc[171]1)[170](x[172]2),y%(spr%,x)
  588. 600 [151] vc[170]28,[194](vc[170]28) [176] (2[174](x[171]1) [172] mult%(spr%,x))
  589. 601 [130] x
  590. 602 [151] vc[170]21,mm%
  591. 603 [142]
  592. 604 sn%[178]1:px%[178]y%(spr%,sn%):ra%[178]2[174](sn%[171]1):up%[178]1
  593. 605 [142]
  594. 606 [139] px%[179]1[167][142]
  595. 607 px%[178]px%[171]up%
  596. 608 [139] px%[179]1[167] [151]53269,[194](53269)[175]255[171]ra%:px%[178]0
  597. 609 [151] 53247[170]2[172]sn%,px%
  598. 610 [142]
  599. 611 [159]1,8,15:[159]5,8,5,"0:map.s,s,r":[141]528
  600. 612 [139] e%[177]19 [167]81
  601. 613 [151]53280,9:[151]53281,7:[153] "load"[199](142);
  602. 614 [129] y [178] 1 [164] 23
  603. 615 [132]5, ln$: [153] "verify"ln$
  604. 616 [130] y:[132]5,ln$:[153] ln$;
  605. 617 [160] 5: [160] 1
  606. 618 [161] c$: [139] c$ [178] "" [167] 618
  607. 619 [153]"load":[151]53281,0:[137]91
  608. 620 s[178]54272:v[178]s[170]24:w[178]s[170]4:fu[178]s[170]1:fl[178]s:ad[178]s[170]5:sr[178]s[170]6:sl[178]s[170]14:su[178]s[170]15:[151]sr,0
  609. 621 [151]v,15:[151]ad,14:[151]53285,7
  610. 622 [145] lost% [137] 686
  611. 623 [145] win% [137] 625
  612. 624 [145] spr% [137] 697,677,653,666,709,659
  613. 625 [143]***echoing ufo takeoff***
  614. 626 [151]sr,22
  615. 627 [151]w,21
  616. 628 [151]sl,67:[151]su,12
  617. 629 [129]f[178]1[164]80:[141]606:up%[178][181](up):up[178]up[170]0.3:[141]692:[139]z$[179][177]""[167]633
  618. 630 [129]t[178]0[164]22:[130]t:[151]fu,f:[151]fl,f:[130]f
  619. 631 [151]w,20:[129]t[178]1[164]100:[141]692:[139]z$[179][177]""[167]694
  620. 632 [130] t
  621. 633 win%[178]0:[137]694
  622. 634 [143]***alien planet***
  623. 635 [151]v,0:[151]sl,68:[151]su,13
  624. 636 [151]w,21:[151]v,14
  625. 637 [129]n[178]1[164]2
  626. 638 [129]f[178]255[164]150[169][171].5:[151]w,21:[151]fu,f:[141]692:[139]z$[179][177]""[167]694
  627. 639 [130] f
  628. 640 [129]f[178]1[164]210[169].6:[151]fu,f:[130]f
  629. 641 [151]w,32:[137]694
  630. 642 [143]*** computer 'f' ****
  631. 643 [151]sr,128:[129]n[178]1[164]75:[151]w,19:f[178][181]([187](1.5)[172]145)[170]2
  632. 644 [141]692:[139]z$[179][177]""[167][142]
  633. 645 [151]fu,f:[151]su,f
  634. 646 [129]t[178]1[164]32:[130]t
  635. 647 [130]n:[151]w,19:[151]sr,09
  636. 648 [129]n[178]1[164]180:f[178][181]([187](1.5)[172]145)[170]2:[141]692:[139]z$[179][177]""[167][142]
  637. 649 [151]fu,f:[151]su,f
  638. 650 [129]t[178]1[164]37:[130]t
  639. 651 [130]n
  640. 652 [151]w,20:[137]694
  641. 653 [143]***rubber band***
  642. 654 [151]ad,15:[151]sr,64[170]9
  643. 655 [151]fu,67:[151]fl,12:[151]su,5
  644. 656 [151]w,19:[129]f[178]0[164]255[169]1.3:[151]sl,f:[130] f
  645. 657 [151]w,18:[129]t[178]0[164]20:[130] t
  646. 658 [137]694
  647. 659 [143]***bwee***
  648. 660 [151]ad,119
  649. 661 [129]n[178]1[164]50
  650. 662 [151]w,17
  651. 663 [129]f[178][181]([187](.)[172]50)[170]50[164][181]([187](.)[172]150)[170]50[169]3:[151]fu,f:[130]:[151]w,16
  652. 664 [141]692:[139]z$[179][177]""[167]694
  653. 665 [130]n:[137]694
  654. 666 [143]***ow !!***
  655. 667 [139]a[178]6[167]634
  656. 668 [151]ad,47:[151]s[170]23,239:[151]v,12[170]32
  657. 669 [129]n[178]0[164]14:[161]a$:[139]a$[179][177]""[167][151]s[170]23,0:[151]v,14:[142]
  658. 670 [151]fu,[181]([187](.)[172]5)[170]2
  659. 671 [151]w,33
  660. 672 [129]sw[178]100[164]0[169][171]3
  661. 673 [151]s[170]22,sw:[130]sw
  662. 674 [151]w,32:[129]t[178]1[164]100:[130]
  663. 675 [130]n
  664. 676 [151]s[170]23,0:[151]v,12:[137]694
  665. 677 [143]*** ray gun ***
  666. 678 [151]w,17:[129]n[178]1[164]2:[151]w,17
  667. 679 [129]f[178]06[164]37[169]1.9:[151]fu,f:[130]f
  668. 680 [130]n:[141]692:[139]z$[179][177]""[167][142]
  669. 681 [151]ad,12:[129]n[178]1[164]18
  670. 682 [129]f[178]0[164]180[169]3.5:[151]fu,f:[130]f
  671. 683 [141]692:[139]z$[179][177]""[167][142]
  672. 684 [130] n
  673. 685 [151]w,16:[137]694
  674. 686 [143]***fire klaxon****
  675. 687 [151]su,4:[151]w,21:[129]d[178]7[164]0[169][171]1
  676. 688 [151]fu,43:[129]t[178]1[164]500:[130]:[141]692:[139]z$[179][177]""[167][142]
  677. 689 [151]fu,31:[129]t[178]1[164]500:[130]:[141]692:[139]z$[179][177]""[167][142]
  678. 690 [130]d
  679. 691 [151]sr,0:[151]w,20:[137]694
  680. 692 [143]: *****break sub*****
  681. 693 [161]z$:[139]z$[178]""[167][142]
  682. 694 w[178]54276:sr[178]w[170]2:[151]sr,0:[151]w,20
  683. 695 [129]t[178]54272[164]54295:[151]t,0:[130]:[151]54296,15
  684. 696 [142]
  685. 697 [143]*****three-toed wheel*****
  686. 698 [129]l[178]54272[164]54295:[151]l,0:[130]:[151]54296,15
  687. 699 [151]54277,8:[151]54278,255:[151]54276,21
  688. 700 [129]z[178]1[164]3:f1[178]20
  689. 701 [129]y[178]0[164]3:f2[178]100
  690. 702 [151]54273,f1:[141]692:[139]z$[179][177]""[167][142]
  691. 703 [129]x[178]1[164]5:[151]54287,f2
  692. 704 f1[178]f1[172]1.05:f2[178]f2[172].1
  693. 705 [130]x:[141]692:[139]z$[179][177]""[167][142]
  694. 706 [130]y:[141]692:[139]z$[179][177]""[167][142]
  695. 707 [130]z:[141]692:[139]z$[179][177]""[167][142]
  696. 708 [151]54276,20:[137]694
  697. 709 [143]*****minor thriller*******
  698. 710 [129]l[178]54272[164]54295:[151]l,0:[130]:[151]54296,15
  699. 711 [151]54277,8:[151]54278,255:[151]54276,23
  700. 712 [129]z[178]1[164]2:f1[178]10:[129]y[178]1[164]6:f2[178]30
  701. 713 [151]54273,f1:[141]692:[139]z$[179][177]""[167][142]
  702. 714 [129]x[178]1[164]3:[151]vc[170]21,255[171]2[174](c[171]1):[151]54287,f2
  703. 715 f2[178]f2[173]1.2:[130]x:[151]vc[170]21,255:f1[178]f1[172]1.5:[130]y
  704. 716 [129]w[178]1[164]8
  705. 717 [151]54273,f1
  706. 718 [151]54287,5:[129]v[178]1[164]5:[130]v
  707. 719 f1[178]f1[173]1.5:[130]w:[130]z:[151]54278,15
  708. 720 [151]54276,20:[137]694
  709. 721 [143]**** hear see chord **********
  710. 722 [141]604:[129]l[178]54272[164]54295:[151]l,0:[130]:[151]54296,15
  711. 723 v1[178]54276:v2[178]54283:v3[178]54290:w[178]65:q[178]100
  712. 724 [151]54275,8:[151]54282,8:[151]54289,8
  713. 725 [151]54277,2:[151]54278,12
  714. 726 [151]54284,2:[151]54285,12
  715. 727 [151]54291,2:[151]54292,12
  716. 728 [151]54273,16:[151]54272,195
  717. 729 [151]54280,21:[151]54279,31
  718. 730 [151]54287,25:[151]54286,30
  719. 731 [129]z[178]1[164]50:[151]v1,w
  720. 732 c[178][181](15[172][187](1))[170]1:qz[178][181]([187](1)[172]479):[151]qz[170]32773,46
  721. 733 [151]qz[170]55296,c
  722. 734 [129]t[178]1[164]q:[130]t
  723. 735 [151]v2,w:[151]v1,w[171]1
  724. 736 [129]t[178]1[164]q:[130]:[151]v2,w[171]1
  725. 737 [151]v3,w:[151]v2,w[171]1
  726. 738 [129]t[178]1[164]q:[130]:[151]v3,w[171]1
  727. 739 q[178]q[171]7:[130]
  728. 740 [129]t[178]1[164]50:[130]
  729. 741 [129]l[178]54272[164]54295:[151]l,0:[130]:[151]54296,15
  730. 742 [142]
  731. 800 [145] (pr%[171]1) [137] 820, 830, 840, 850, 860, 870, 880, 000
  732. 810 buy$ [178] p1$: price[178]p1:[137]890
  733. 820 buy$ [178] p2$: price[178]p2:[137]890
  734. 830 buy$ [178] p3$: price[178]p3:[137]890
  735. 840 buy$ [178] p4$: price[178]p4:[137]890
  736. 850 buy$ [178] p5$: price[178]p5:[137]890
  737. 860 buy$ [178] p6$: price[178]p6:[137]890
  738. 870 buy$ [178] p7$: price[178]p7:[137]890
  739. 880 buy$ [178] p8$: price[178]p8
  740. 890 [142]
  741. 9000 [153]"load  are you sure you want to quit? (y/n)"
  742. 9010 [161]a$:[139]a$[179][177]"y"[175]a$[179][177]"n"[167]9010
  743. 9020 [139]a$[178]"n"[167]91
  744. 60000 [159]15,8,15,"r0:hello connect=hello connect":[132]15,er:[160]15
  745. 60010 [139]er[179][177]63[167][128]
  746. 60020 [151]648,4:[151]56576,151:[151]53270,200:[151]53265,27:[151]53272,21
  747. 60030 [153]"load":[147]"hello connect",8
  748.